home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #15
/
Monster Media Number 15 (Monster Media)(July 1996).ISO
/
prog_pas
/
file2inc.zip
/
EXAMPLE.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1996-05-21
|
195b
|
12 lines
Program Example_of_File2Inc;
uses crt;
{$I example.inc}
var index:longint;
begin
clrscr;
for index:=0 to examplesize do
write(chr(example[index]));
repeat until keypressed;
end.